home *** CD-ROM | disk | FTP | other *** search
/ Nebula 1 / Nebula One.iso / Internet / News / Alexandra.0.82 / Source / KeyEventResponder.m < prev    next >
Encoding:
Text File  |  1996-01-30  |  991 b   |  55 lines
  1.  
  2. #import "KeyEventResponder.h"
  3. #import "NewsgroupSet.h"
  4. #import "ArticleSet.h"
  5.  
  6. @implementation KeyEventResponder
  7.  
  8. - setNGSet:sender
  9. {
  10.    theNewsgroupSet=sender;
  11.  
  12.    return self;
  13. }
  14.  
  15. - setArticleSet:sender
  16. {
  17.    theArticleSet=sender;
  18.  
  19.    return self;
  20. }
  21.  
  22. - keyDown:(NXEvent *)theEvent
  23. {
  24.    if(theEvent->data.key.repeat!=0)
  25.       return self;
  26.  
  27.    if(theEvent->data.key.charCode==173){
  28.       [theNewsgroupSet up:self];
  29.       return self;
  30.    }
  31.    if(theEvent->data.key.charCode==175){
  32.       [theNewsgroupSet down:self];
  33.       return self;
  34.    }
  35.    if(theEvent->data.key.charCode==32){
  36.         if(theEvent->flags & NX_SHIFTMASK)
  37.             [theNewsgroupSet upOnePage:self];
  38.         else
  39.           [theNewsgroupSet downOnePage:self];
  40.       return self;
  41.    }
  42.    if(theEvent->data.key.charCode==174){
  43.       [theArticleSet skipThreadAndDown:self];
  44.       return self;
  45.    }
  46.    if(theEvent->data.key.charCode==172){
  47.       [theArticleSet skipThreadAndUp:self];
  48.       return self;
  49.    }
  50.  
  51.    return [super keyDown:theEvent];
  52. }
  53.  
  54. @end
  55.